package me.olook.netease.song.rank.util;

import com.google.common.hash.BloomFilter;
import com.google.common.hash.Funnels;
import com.google.gson.Gson;
import com.google.gson.JsonObject;
import me.olook.netease.song.rank.entity.WeiBoLoginParam;
import me.olook.netease.song.rank.entity.WeiboUser;
import me.olook.netease.song.rank.util.cookie.EasySpecProvider;
import org.apache.commons.net.util.Base64;
import org.apache.http.HttpEntity;
import org.apache.http.HttpHost;
import org.apache.http.HttpResponse;
import org.apache.http.client.ClientProtocolException;
import org.apache.http.client.CookieStore;
import org.apache.http.client.HttpClient;
import org.apache.http.client.config.RequestConfig;
import org.apache.http.client.entity.UrlEncodedFormEntity;
import org.apache.http.client.methods.HttpGet;
import org.apache.http.client.methods.HttpPost;
import org.apache.http.config.Registry;
import org.apache.http.config.RegistryBuilder;
import org.apache.http.cookie.CookieSpecProvider;
import org.apache.http.impl.client.BasicCookieStore;
import org.apache.http.impl.client.HttpClientBuilder;
import org.apache.http.message.BasicNameValuePair;
import org.apache.http.util.EntityUtils;
import org.jsoup.Jsoup;
import org.jsoup.nodes.Document;
import org.jsoup.select.Elements;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.core.env.Environment;
import org.springframework.http.HttpHeaders;
import org.springframework.http.HttpStatus;
import org.springframework.stereotype.Service;

import javax.script.Invocable;
import javax.script.ScriptEngine;
import javax.script.ScriptEngineManager;
import javax.script.ScriptException;
import java.io.FileOutputStream;
import java.io.IOException;
import java.io.UnsupportedEncodingException;
import java.net.URLDecoder;
import java.net.URLEncoder;
import java.nio.charset.Charset;
import java.text.ParseException;
import java.text.SimpleDateFormat;
import java.util.*;
import java.util.regex.Matcher;
import java.util.regex.Pattern;

/**
 * @author zhaohw
 * @date 2018-05-28 14:35
 */
@Service
public class WeiboApiImpl implements WeiboApi{

    @Autowired
    private Environment env;

    private static Logger log = LoggerFactory.getLogger(WeiboApiImpl.class);

    private static CookieStore loginCookie = new BasicCookieStore();

    private static String pinCodePath = "./pincode.jpg";

    private HttpHost proxy = new HttpHost("39.137.69.7", 8080, "http");

    private Registry<CookieSpecProvider> registry = RegistryBuilder.<CookieSpecProvider>create()
            .register("easy", new EasySpecProvider())
            .build();

    private RequestConfig defaultRequestConfig = RequestConfig.custom()
            .setCookieSpec("easy")
            //.setProxy(proxy)
            .build();

    private HttpClient httpClient = HttpClientBuilder.create()
            .setDefaultCookieStore(loginCookie)
            .setDefaultCookieSpecRegistry(registry)
            .setDefaultRequestConfig(defaultRequestConfig)
            .build();

    private static int size = 1000;

    private static BloomFilter<String> bloomFilter = BloomFilter.create(Funnels.stringFunnel(Charset.defaultCharset()), size);

    /**
     * sinaSSOEncoder 加密算法
     */
    private static final String SINA_SSO_ENCODER = "var sinaSSOEncoder=sinaSSOEncoder||{};(function(){var hexcase=0;var chrsz=8;this.hex_sha1=function(s){return binb2hex(core_sha1(str2binb(s),s.length*chrsz));};var core_sha1=function(x,len){x[len>>5]|=0x80<<(24-len%32);x[((len+64>>9)<<4)+15]=len;var w=Array(80);var a=1732584193;var b=-271733879;var c=-1732584194;var d=271733878;var e=-1009589776;for(var i=0;i<x.length;i+=16){var olda=a;var oldb=b;var oldc=c;var oldd=d;var olde=e;for(var j=0;j<80;j++){if(j<16)w[j]=x[i+j];else w[j]=rol(w[j-3]^w[j-8]^w[j-14]^w[j-16],1);var t=safe_add(safe_add(rol(a,5),sha1_ft(j,b,c,d)),safe_add(safe_add(e,w[j]),sha1_kt(j)));e=d;d=c;c=rol(b,30);b=a;a=t;}a=safe_add(a,olda);b=safe_add(b,oldb);c=safe_add(c,oldc);d=safe_add(d,oldd);e=safe_add(e,olde);}return Array(a,b,c,d,e);};var sha1_ft=function(t,b,c,d){if(t<20)return(b&c)|((~b)&d);if(t<40)return b^c^d;if(t<60)return(b&c)|(b&d)|(c&d);return b^c^d;};var sha1_kt=function(t){return(t<20)?1518500249:(t<40)?1859775393:(t<60)?-1894007588:-899497514;};var safe_add=function(x,y){var lsw=(x&0xFFFF)+(y&0xFFFF);var msw=(x>>16)+(y>>16)+(lsw>>16);return(msw<<16)|(lsw&0xFFFF);};var rol=function(num,cnt){return(num<<cnt)|(num>>>(32-cnt));};var str2binb=function(str){var bin=Array();var mask=(1<<chrsz)-1;for(var i=0;i<str.length*chrsz;i+=chrsz)bin[i>>5]|=(str.charCodeAt(i/chrsz)&mask)<<(24-i%32);return bin;};var binb2hex=function(binarray){var hex_tab=hexcase?'0123456789ABCDEF':'0123456789abcdef';var str='';for(var i=0;i<binarray.length*4;i++){str+=hex_tab.charAt((binarray[i>>2]>>((3-i%4)*8+4))&0xF)+hex_tab.charAt((binarray[i>>2]>>((3-i%4)*8))&0xF);}return str;};this.base64={encode:function(input){input=''+input;if(input=='')return '';var output='';var chr1,chr2,chr3='';var enc1,enc2,enc3,enc4='';var i=0;do{chr1=input.charCodeAt(i++);chr2=input.charCodeAt(i++);chr3=input.charCodeAt(i++);enc1=chr1>>2;enc2=((chr1&3)<<4)|(chr2>>4);enc3=((chr2&15)<<2)|(chr3>>6);enc4=chr3&63;if(isNaN(chr2)){enc3=enc4=64;}else if(isNaN(chr3)){enc4=64;}output=output+this._keys.charAt(enc1)+this._keys.charAt(enc2)+this._keys.charAt(enc3)+this._keys.charAt(enc4);chr1=chr2=chr3='';enc1=enc2=enc3=enc4='';}while(i<input.length);return output;},_keys:'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/='};}).call(sinaSSOEncoder);;(function(){var dbits;var canary=0xdeadbeefcafe;var j_lm=((canary&0xffffff)==0xefcafe);function BigInteger(a,b,c){if(a!=null)if('number'==typeof a)this.fromNumber(a,b,c);else if(b==null && 'string' !=typeof a)this.fromString(a,256);else this.fromString(a,b);}function nbi(){return new BigInteger(null);}function am1(i,x,w,j,c,n){while(--n>=0){var v=x*this[i++]+w[j]+c;c=Math.floor(v/0x4000000);w[j++]=v&0x3ffffff;}return c;}function am2(i,x,w,j,c,n){var xl=x&0x7fff,xh=x>>15;while(--n>=0){var l=this[i]&0x7fff;var h=this[i++]>>15;var m=xh*l+h*xl;l=xl*l+((m&0x7fff)<<15)+w[j]+(c&0x3fffffff);c=(l>>>30)+(m>>>15)+xh*h+(c>>>30);w[j++]=l&0x3fffffff;}return c;}function am3(i,x,w,j,c,n){var xl=x&0x3fff,xh=x>>14;while(--n>=0){var l=this[i]&0x3fff;var h=this[i++]>>14;var m=xh*l+h*xl;l=xl*l+((m&0x3fff)<<14)+w[j]+c;c=(l>>28)+(m>>14)+xh*h;w[j++]=l&0xfffffff;}return c;}BigInteger.prototype.am=am3;dbits=28;BigInteger.prototype.DB=dbits;BigInteger.prototype.DM=((1<<dbits)-1);BigInteger.prototype.DV=(1<<dbits);var BI_FP=52;BigInteger.prototype.FV=Math.pow(2,BI_FP);BigInteger.prototype.F1=BI_FP-dbits;BigInteger.prototype.F2=2*dbits-BI_FP;var BI_RM='0123456789abcdefghijklmnopqrstuvwxyz';var BI_RC=new Array();var rr,vv;rr='0'.charCodeAt(0);for(vv=0;vv<=9;++vv)BI_RC[rr++]=vv;rr='a'.charCodeAt(0);for(vv=10;vv<36;++vv)BI_RC[rr++]=vv;rr='A'.charCodeAt(0);for(vv=10;vv<36;++vv)BI_RC[rr++]=vv;function int2char(n){return BI_RM.charAt(n);}function intAt(s,i){var c=BI_RC[s.charCodeAt(i)];return(c==null)?-1:c;}function bnpCopyTo(r){for(var i=this.t-1;i>=0;--i)r[i]=this[i];r.t=this.t;r.s=this.s;}function bnpFromInt(x){this.t=1;this.s=(x<0)?-1:0;if(x>0)this[0]=x;else if(x<-1)this[0]=x+DV;else this.t=0;}function nbv(i){var r=nbi();r.fromInt(i);return r;}function bnpFromString(s,b){var k;if(b==16)k=4;else if(b==8)k=3;else if(b==256)k=8;else if(b==2)k=1;else if(b==32)k=5;else if(b==4)k=2;else{this.fromRadix(s,b);return;}this.t=0;this.s=0;var i=s.length,mi=false,sh=0;while(--i>=0){var x=(k==8)?s[i]&0xff:intAt(s,i);if(x<0){if(s.charAt(i)=='-')mi=true;continue;}mi=false;if(sh==0)this[this.t++]=x;else if(sh+k>this.DB){this[this.t-1]|=(x&((1<<(this.DB-sh))-1))<<sh;this[this.t++]=(x>>(this.DB-sh));}else  this[this.t-1]|=x<<sh;sh+=k;if(sh>=this.DB)sh-=this.DB;}if(k==8&&(s[0]&0x80)!=0){this.s=-1;if(sh>0)this[this.t-1]|=((1<<(this.DB-sh))-1)<<sh;}this.clamp();if(mi)BigInteger.ZERO.subTo(this,this);}function bnpClamp(){var c=this.s&this.DM;while(this.t>0&&this[this.t-1]==c)--this.t;}function bnToString(b){if(this.s<0)return '-'+this.negate().toString(b);var k;if(b==16)k=4;else if(b==8)k=3;else if(b==2)k=1;else if(b==32)k=5;else if(b==4)k=2;else return this.toRadix(b);var km=(1<<k)-1,d,m=false,r='',i=this.t;var p=this.DB-(i*this.DB)%k;if(i-->0){if(p<this.DB&&(d=this[i]>>p)>0){m=true;r=int2char(d);}while(i>=0){if(p<k){d=(this[i]&((1<<p)-1))<<(k-p);d|=this[--i]>>(p+=this.DB-k);}else{d=(this[i]>>(p-=k))&km;if(p<=0){p+=this.DB;--i;}}if(d>0)m=true;if(m)r+=int2char(d);}}return m?r:'0';}function bnNegate(){var r=nbi();BigInteger.ZERO.subTo(this,r);return r;}function bnAbs(){return(this.s<0)?this.negate():this;}function bnCompareTo(a){var r=this.s-a.s;if(r!=0)return r;var i=this.t;r=i-a.t;if(r!=0)return r;while(--i>=0)if((r=this[i]-a[i])!=0)return r;return 0;}function nbits(x){var r=1,t;if((t=x>>>16)!=0){x=t;r+=16;}if((t=x>>8)!=0){x=t;r+=8;}if((t=x>>4)!=0){x=t;r+=4;}if((t=x>>2)!=0){x=t;r+=2;}if((t=x>>1)!=0){x=t;r+=1;}return r;}function bnBitLength(){if(this.t<=0)return 0;return this.DB*(this.t-1)+nbits(this[this.t-1]^(this.s&this.DM));}function bnpDLShiftTo(n,r){var i;for(i=this.t-1;i>=0;--i)r[i+n]=this[i];for(i=n-1;i>=0;--i)r[i]=0;r.t=this.t+n;r.s=this.s;}function bnpDRShiftTo(n,r){for(var i=n;i<this.t;++i)r[i-n]=this[i];r.t=Math.max(this.t-n,0);r.s=this.s;}function bnpLShiftTo(n,r){var bs=n%this.DB;var cbs=this.DB-bs;var bm=(1<<cbs)-1;var ds=Math.floor(n/this.DB),c=(this.s<<bs)&this.DM,i;for(i=this.t-1;i>=0;--i){r[i+ds+1]=(this[i]>>cbs)|c;c=(this[i]&bm)<<bs;}for(i=ds-1;i>=0;--i)r[i]=0;r[ds]=c;r.t=this.t+ds+1;r.s=this.s;r.clamp();}function bnpRShiftTo(n,r){r.s=this.s;var ds=Math.floor(n/this.DB);if(ds>=this.t){r.t=0;return;}var bs=n%this.DB;var cbs=this.DB-bs;var bm=(1<<bs)-1;r[0]=this[ds]>>bs;for(var i=ds+1;i<this.t;++i){r[i-ds-1]|=(this[i]&bm)<<cbs;r[i-ds]=this[i]>>bs;}if(bs>0)r[this.t-ds-1]|=(this.s&bm)<<cbs;r.t=this.t-ds;r.clamp();}function bnpSubTo(a,r){var i=0,c=0,m=Math.min(a.t,this.t);while(i<m){c+=this[i]-a[i];r[i++]=c&this.DM;c>>=this.DB;}if(a.t<this.t){c-=a.s;while(i<this.t){c+=this[i];r[i++]=c&this.DM;c>>=this.DB;}c+=this.s;}else{c+=this.s;while(i<a.t){c-=a[i];r[i++]=c&this.DM;c>>=this.DB;}c-=a.s;}r.s=(c<0)?-1:0;if(c<-1)r[i++]=this.DV+c;else if(c>0)r[i++]=c;r.t=i;r.clamp();}function bnpMultiplyTo(a,r){var x=this.abs(),y=a.abs();var i=x.t;r.t=i+y.t;while(--i>=0)r[i]=0;for(i=0;i<y.t;++i)r[i+x.t]=x.am(0,y[i],r,i,0,x.t);r.s=0;r.clamp();if(this.s!=a.s)BigInteger.ZERO.subTo(r,r);}function bnpSquareTo(r){var x=this.abs();var i=r.t=2*x.t;while(--i>=0)r[i]=0;for(i=0;i<x.t-1;++i){var c=x.am(i,x[i],r,2*i,0,1);if((r[i+x.t]+=x.am(i+1,2*x[i],r,2*i+1,c,x.t-i-1))>=x.DV){r[i+x.t]-=x.DV;r[i+x.t+1]=1;}}if(r.t>0)r[r.t-1]+=x.am(i,x[i],r,2*i,0,1);r.s=0;r.clamp();}function bnpDivRemTo(m,q,r){var pm=m.abs();if(pm.t<=0)return;var pt=this.abs();if(pt.t<pm.t){if(q!=null)q.fromInt(0);if(r!=null)this.copyTo(r);return;}if(r==null)r=nbi();var y=nbi(),ts=this.s,ms=m.s;var nsh=this.DB-nbits(pm[pm.t-1]);if(nsh>0){pm.lShiftTo(nsh,y);pt.lShiftTo(nsh,r);}else{pm.copyTo(y);pt.copyTo(r);}var ys=y.t;var y0=y[ys-1];if(y0==0)return;var yt=y0*(1<<this.F1)+((ys>1)?y[ys-2]>>this.F2:0);var d1=this.FV/yt,d2=(1<<this.F1)/yt,e=1<<this.F2;var i=r.t,j=i-ys,t=(q==null)?nbi():q;y.dlShiftTo(j,t);if(r.compareTo(t)>=0){r[r.t++]=1;r.subTo(t,r);}BigInteger.ONE.dlShiftTo(ys,t);t.subTo(y,y);while(y.t<ys)y[y.t++]=0;while(--j>=0){var qd=(r[--i]==y0)?this.DM:Math.floor(r[i]*d1+(r[i-1]+e)*d2);if((r[i]+=y.am(0,qd,r,j,0,ys))<qd){y.dlShiftTo(j,t);r.subTo(t,r);while(r[i]<--qd)r.subTo(t,r);}}if(q!=null){r.drShiftTo(ys,q);if(ts!=ms)BigInteger.ZERO.subTo(q,q);}r.t=ys;r.clamp();if(nsh>0)r.rShiftTo(nsh,r);if(ts<0)BigInteger.ZERO.subTo(r,r);}function bnMod(a){var r=nbi();this.abs().divRemTo(a,null,r);if(this.s<0&&r.compareTo(BigInteger.ZERO)>0)a.subTo(r,r);return r;}function Classic(m){this.m=m;}function cConvert(x){if(x.s<0||x.compareTo(this.m)>=0)return x.mod(this.m);else return x;}function cRevert(x){return x;}function cReduce(x){x.divRemTo(this.m,null,x);}function cMulTo(x,y,r){x.multiplyTo(y,r);this.reduce(r);}function cSqrTo(x,r){x.squareTo(r);this.reduce(r);}Classic.prototype.convert=cConvert;Classic.prototype.revert=cRevert;Classic.prototype.reduce=cReduce;Classic.prototype.mulTo=cMulTo;Classic.prototype.sqrTo=cSqrTo;function bnpInvDigit(){if(this.t<1)return 0;var x=this[0];if((x&1)==0)return 0;var y=x&3;y=(y*(2-(x&0xf)*y))&0xf;y=(y*(2-(x&0xff)*y))&0xff;y=(y*(2-(((x&0xffff)*y)&0xffff)))&0xffff;y=(y*(2-x*y%this.DV))%this.DV;return(y>0)?this.DV-y:-y;}function Montgomery(m){this.m=m;this.mp=m.invDigit();this.mpl=this.mp&0x7fff;this.mph=this.mp>>15;this.um=(1<<(m.DB-15))-1;this.mt2=2*m.t;}function montConvert(x){var r=nbi();x.abs().dlShiftTo(this.m.t,r);r.divRemTo(this.m,null,r);if(x.s<0&&r.compareTo(BigInteger.ZERO)>0)this.m.subTo(r,r);return r;}function montRevert(x){var r=nbi();x.copyTo(r);this.reduce(r);return r;}function montReduce(x){while(x.t<=this.mt2)x[x.t++]=0;for(var i=0;i<this.m.t;++i){var j=x[i]&0x7fff;var u0=(j*this.mpl+(((j*this.mph+(x[i]>>15)*this.mpl)&this.um)<<15))&x.DM;j=i+this.m.t;x[j]+=this.m.am(0,u0,x,i,0,this.m.t);while(x[j]>=x.DV){x[j]-=x.DV;x[++j]++;}}x.clamp();x.drShiftTo(this.m.t,x);if(x.compareTo(this.m)>=0)x.subTo(this.m,x);}function montSqrTo(x,r){x.squareTo(r);this.reduce(r);}function montMulTo(x,y,r){x.multiplyTo(y,r);this.reduce(r);}Montgomery.prototype.convert=montConvert;Montgomery.prototype.revert=montRevert;Montgomery.prototype.reduce=montReduce;Montgomery.prototype.mulTo=montMulTo;Montgomery.prototype.sqrTo=montSqrTo;function bnpIsEven(){return((this.t>0)?(this[0]&1):this.s)==0;}function bnpExp(e,z){if(e>0xffffffff||e<1)return BigInteger.ONE;var r=nbi(),r2=nbi(),g=z.convert(this),i=nbits(e)-1;g.copyTo(r);while(--i>=0){z.sqrTo(r,r2);if((e&(1<<i))>0)z.mulTo(r2,g,r);else{var t=r;r=r2;r2=t;}}return z.revert(r);}function bnModPowInt(e,m){var z;if(e<256||m.isEven())z=new Classic(m);else z=new Montgomery(m);return this.exp(e,z);}BigInteger.prototype.copyTo=bnpCopyTo;BigInteger.prototype.fromInt=bnpFromInt;BigInteger.prototype.fromString=bnpFromString;BigInteger.prototype.clamp=bnpClamp;BigInteger.prototype.dlShiftTo=bnpDLShiftTo;BigInteger.prototype.drShiftTo=bnpDRShiftTo;BigInteger.prototype.lShiftTo=bnpLShiftTo;BigInteger.prototype.rShiftTo=bnpRShiftTo;BigInteger.prototype.subTo=bnpSubTo;BigInteger.prototype.multiplyTo=bnpMultiplyTo;BigInteger.prototype.squareTo=bnpSquareTo;BigInteger.prototype.divRemTo=bnpDivRemTo;BigInteger.prototype.invDigit=bnpInvDigit;BigInteger.prototype.isEven=bnpIsEven;BigInteger.prototype.exp=bnpExp;BigInteger.prototype.toString=bnToString;BigInteger.prototype.negate=bnNegate;BigInteger.prototype.abs=bnAbs;BigInteger.prototype.compareTo=bnCompareTo;BigInteger.prototype.bitLength=bnBitLength;BigInteger.prototype.mod=bnMod;BigInteger.prototype.modPowInt=bnModPowInt;BigInteger.ZERO=nbv(0);BigInteger.ONE=nbv(1);function Arcfour(){this.i=0;this.j=0;this.S=new Array();}function ARC4init(key){var i,j,t;for(i=0;i<256;++i)this.S[i]=i;j=0;for(i=0;i<256;++i){j=(j+this.S[i]+key[i%key.length])&255;t=this.S[i];this.S[i]=this.S[j];this.S[j]=t;}this.i=0;this.j=0;}function ARC4next(){var t;this.i=(this.i+1)&255;this.j=(this.j+this.S[this.i])&255;t=this.S[this.i];this.S[this.i]=this.S[this.j];this.S[this.j]=t;return this.S[(t+this.S[this.i])&255];}Arcfour.prototype.init=ARC4init;Arcfour.prototype.next=ARC4next;function prng_newstate(){return new Arcfour();}var rng_psize=256;var rng_state;var rng_pool;var rng_pptr;function rng_seed_int(x){rng_pool[rng_pptr++]^=x&255;rng_pool[rng_pptr++]^=(x>>8)&255;rng_pool[rng_pptr++]^=(x>>16)&255;rng_pool[rng_pptr++]^=(x>>24)&255;if(rng_pptr>=rng_psize)rng_pptr-=rng_psize;}function rng_seed_time(){rng_seed_int(new Date().getTime());}if(rng_pool==null){rng_pool=new Array();rng_pptr=0;var t;while(rng_pptr<rng_psize){t=Math.floor(65536*Math.random());rng_pool[rng_pptr++]=t>>>8;rng_pool[rng_pptr++]=t&255;}rng_pptr=0;rng_seed_time();}function rng_get_byte(){if(rng_state==null){rng_seed_time();rng_state=prng_newstate();rng_state.init(rng_pool);for(rng_pptr=0;rng_pptr<rng_pool.length;++rng_pptr)rng_pool[rng_pptr]=0;rng_pptr=0;}return rng_state.next();}function rng_get_bytes(ba){var i;for(i=0;i<ba.length;++i)ba[i]=rng_get_byte();}function SecureRandom(){}SecureRandom.prototype.nextBytes=rng_get_bytes;function parseBigInt(str,r){return new BigInteger(str,r);}function linebrk(s,n){var ret='';var i=0;while(i+n<s.length){ret+=s.substring(i,i+n)+'\\n';i+=n;}return ret+s.substring(i,s.length);}function byte2Hex(b){if(b<0x10)return '0'+b.toString(16);else  return b.toString(16);}function pkcs1pad2(s,n){if(n<s.length+11){return null;}var ba=new Array();var i=s.length-1;while(i>=0&&n>0){var c=s.charCodeAt(i--);if(c<128){ba[--n]=c;}else if((c>127)&&(c<2048)){ba[--n]=(c&63)|128;ba[--n]=(c>>6)|192;}else{ba[--n]=(c&63)|128;ba[--n]=((c>>6)&63)|128;ba[--n]=(c>>12)|224;}}ba[--n]=0;var rng=new SecureRandom();var x=new Array();while(n>2){x[0]=0;while(x[0]==0)rng.nextBytes(x);ba[--n]=x[0];}ba[--n]=2;ba[--n]=0;return new BigInteger(ba);}function RSAKey(){this.n=null;this.e=0;this.d=null;this.p=null;this.q=null;this.dmp1=null;this.dmq1=null;this.coeff=null;}function RSASetPublic(N,E){if(N!=null&&E!=null&&N.length>0&&E.length>0){this.n=parseBigInt(N,16);this.e=parseInt(E,16);}else alert('Invalid RSA public key');}function RSADoPublic(x){return x.modPowInt(this.e,this.n);}function RSAEncrypt(text){var m=pkcs1pad2(text,(this.n.bitLength()+7)>>3);if(m==null)return null;var c=this.doPublic(m);if(c==null)return null;var h=c.toString(16);if((h.length&1)==0)return h;else return '0'+h;}RSAKey.prototype.doPublic=RSADoPublic;RSAKey.prototype.setPublic=RSASetPublic;RSAKey.prototype.encrypt=RSAEncrypt;this.RSAKey=RSAKey;}).call(sinaSSOEncoder);function getpass(pwd,servicetime,nonce,rsaPubkey){var RSAKey=new sinaSSOEncoder.RSAKey();RSAKey.setPublic(rsaPubkey,'10001');var password=RSAKey.encrypt([servicetime,nonce].join('\\t')+'\\n'+pwd);return password;}";

    //@PostConstruct
    public void loginInit(){
        log.info("微博初始登陆");
        WeiboApiImpl weiboApi = new WeiboApiImpl();
        weiboApi.Login(env.getProperty("weibo.username"),env.getProperty("weibo.password"));
    }

    /**
     * 登录流程
     * @param username
     * @param password
     */
    private void Login(String username , String password){

        WeiBoLoginParam loginParam = webPreLogin(username);
        loginParam = encodePassword(loginParam,password);
        String url = webLogin(loginParam);
        if(url == null){
            log.error("Web登录返回跳转链接为null");
            return;
        }
        String redirectURL = passportRedirect(url);
        if(redirectURL == null){
            log.error("passportRedirect链接为null");
            return;
        }
        String homeURL = feedBackUrlCallBack(redirectURL);
        String html = homeRedirect(homeURL);
    }

    @Override
    public WeiBoLoginParam webPreLogin(String username) {
        log.debug("PC预登陆...");
        String su = null;
        try {
            su = new String(Base64.encodeBase64(URLEncoder.encode(username, "UTF-8").getBytes()));
        } catch (UnsupportedEncodingException e) {
            log.error("UnsupportedEncoding异常");
            return null;
        }
        String url = "http://login.sina.com.cn/sso/prelogin.php?entry=weibo&rsakt=mod&checkpin=1&" +
                "client=ssologin.js(v1.4.5)&_=" + getTimestamp();
        url += "&su=" + su;
        HttpGet request = new HttpGet(url);
        try {
            request.setHeader(HttpHeaders.USER_AGENT,UserAgents.STATIC_USER_AGENT);
            HttpResponse response = httpClient.execute(request);
            String content = null;
            if (response.getStatusLine().getStatusCode() == HttpStatus.OK.value()) {
                content = EntityUtils.toString(response.getEntity(), "utf-8");
            }
            log.debug("预登陆返回：{}",content);
            Gson gson = new Gson();
            JsonObject json = gson.fromJson(content,JsonObject.class);
            WeiBoLoginParam loginParam = gson.fromJson(content,WeiBoLoginParam.class);
            if(json.get("showpin").getAsInt()==1){
                log.info("请到路径: {} 查看并输入验证码",pinCodePath);
                getPinCode(json.get("pcid").getAsString());
                Scanner scan = new Scanner(System.in);
                String read = scan.nextLine();
                loginParam.setDoor(read);
            }
            loginParam.setSu(su);
            log.debug("登录参数：{}",loginParam.toString());
            return loginParam;
        }catch (ClientProtocolException e) {
            log.error("ClientProtocol异常");
        } catch (IOException e) {
            log.error("IO异常");
        }finally {
            request.releaseConnection();
        }
        return null;
    }

    @Override
    public WeiBoLoginParam encodePassword(WeiBoLoginParam loginParam , String password) {
        String sp = null;
        ScriptEngineManager sem = new ScriptEngineManager();
        ScriptEngine se = sem.getEngineByName("javascript");
        try {
            se.eval(SINA_SSO_ENCODER);
            //调用js内部函数用于加密
            if (se instanceof Invocable) {
                Invocable iv = (Invocable) se;
                sp = (String) iv.invokeFunction("getpass", password, loginParam.getServerTime(), loginParam.getNonce(), loginParam.getPubKey());
            }
            if(sp!=null){
                loginParam.setSp(sp);
                return loginParam;
            }
        } catch (ScriptException | NoSuchMethodException e) {
            e.printStackTrace();
        }
        return null;
    }

    @Override
    public String webLogin(WeiBoLoginParam loginParam) {
        log.debug("PC登陆...");
        log.debug("登录参数：{}",loginParam.toString());
        String url = "https://login.sina.com.cn/sso/login.php?client=ssologin.js(v1.4.19)";
        HttpPost post = new HttpPost(url);
        post.setHeader(HttpHeaders.USER_AGENT,UserAgents.STATIC_USER_AGENT);

        List<BasicNameValuePair> pairList = new ArrayList<BasicNameValuePair>();
        pairList.add(new BasicNameValuePair("entry", "weibo"));
        pairList.add(new BasicNameValuePair("gateway", "1"));
        pairList.add(new BasicNameValuePair("from", ""));
        pairList.add(new BasicNameValuePair("savestate", "7"));
        pairList.add(new BasicNameValuePair("userticket", "1"));
        pairList.add(new BasicNameValuePair("pagerefer",
                "https://passport.weibo.com/visitor/visitor?entry=miniblog&a=enter&url=http%3A%2F%2Fweibo.com%2F&domain=.weibo.com&ua=php-sso_sdk_client-0.6.9&_rand="+getTimestamp()));
        pairList.add(new BasicNameValuePair("vsnf", "1"));
        pairList.add(new BasicNameValuePair("su", loginParam.getSu()));
        pairList.add(new BasicNameValuePair("service", "miniblog"));
        pairList.add(new BasicNameValuePair("servicetime", loginParam.getServerTime()+""));
        pairList.add(new BasicNameValuePair("nonce", loginParam.getNonce()));
        pairList.add(new BasicNameValuePair("pwencode", "rsa2"));
        pairList.add(new BasicNameValuePair("pcid", loginParam.getpCid()));
        //验证码
        pairList.add(new BasicNameValuePair("door", loginParam.getDoor()));
        pairList.add(new BasicNameValuePair("rsakv", loginParam.getRsaKv()));
        pairList.add(new BasicNameValuePair("sp", loginParam.getSp()));
        pairList.add(new BasicNameValuePair("sr", "1920*1080"));
        pairList.add(new BasicNameValuePair("encoding", "UTF-8"));
        pairList.add(new BasicNameValuePair("prelt", "873"));
        pairList.add(new BasicNameValuePair("url", "https://www.weibo.com/ajaxlogin.php?framelogin=1&callback=parent.sinaSSOController.feedBackUrlCallBack"));
        pairList.add(new BasicNameValuePair("returntype", "META"));

        try {
            post.setEntity(new UrlEncodedFormEntity(pairList, "utf-8"));
            HttpResponse response = httpClient.execute(post);
            if (response.getStatusLine().getStatusCode() == HttpStatus.OK.value()) {
                String responseStr = EntityUtils.toString(response.getEntity(), "GBK");
                //log.debug("登录返回：{}",responseStr);
                String regex = "location.replace\\(([\\s\\S]*?)\\);";
                Pattern pattern = Pattern.compile(regex);
                Matcher matcher = pattern.matcher(responseStr);
                if (matcher.find()){
                    String redirectURL  = matcher.group().replace("location.replace(\"","").replace("\");","");
                    if(redirectURL.contains("reason")){
                        String errInfo = redirectURL.substring(redirectURL.indexOf("reason=") + 7);
                        errInfo = URLDecoder.decode(errInfo, "GBK");
                        log.error("登录出错：{}" ,errInfo);
                        return null;
                    }
                    return redirectURL;
                }
                log.debug("Cookie：");
                log.debug(loginCookie.toString());
                return null;
            }
        } catch (IOException e) {
            e.printStackTrace();
        }finally {
            post.releaseConnection();
        }
        return null;
    }

    @Override
    public String passportRedirect(String url) {
        log.debug("PC登陆跳转... {}",url);
        HttpGet request = new HttpGet(url);
        HttpResponse response = null;
        try {
            response = httpClient.execute(request);
            if (response.getStatusLine().getStatusCode() == HttpStatus.OK.value()) {
                String responseStr = EntityUtils.toString(response.getEntity(), "GBK");
                //log.debug("跳转返回：{}",responseStr);
                String regex = "location.replace\\(([\\s\\S]*?)\\);";
                Pattern pattern = Pattern.compile(regex);
                Matcher matcher = pattern.matcher(responseStr);
                if (matcher.find()){
                    return matcher.group().replace("location.replace(\'","").replace("\');","");
                }
            }else {
                log.error("login redirect error , code {}", response.getStatusLine().getStatusCode());
            }
        } catch (IOException e) {
            e.printStackTrace();
        }finally {
            request.releaseConnection();
        }
        return null;
    }

    @Override
    public String feedBackUrlCallBack(String url) {
        log.debug("PC跳转2... {}",url);
        HttpGet request = new HttpGet(url);
        HttpResponse response = null;
        try {
            response = httpClient.execute(request);
            if (response.getStatusLine().getStatusCode() == HttpStatus.OK.value()) {
                String responseStr = EntityUtils.toString(response.getEntity(), "GBK");
                log.debug("跳转2返回：{}",responseStr);
                String regex = "feedBackUrlCallBack\\(([\\s\\S]*?)\\);";
                Pattern pattern = Pattern.compile(regex);
                Matcher matcher = pattern.matcher(responseStr);
                if (matcher.find()){
                    String json = matcher.group().replace("feedBackUrlCallBack(","").replace(");","");
                    JsonObject jsonObject = new Gson().fromJson(json,JsonObject.class);
                    JsonObject userInfo = jsonObject.getAsJsonObject("userinfo");
                    String uniqueId = userInfo.get("uniqueid").getAsString();
                    String userDomain = userInfo.get("userdomain").getAsString();
                    return "https://weibo.com/u/"+uniqueId+userDomain;
                }
            }else {
                log.error("login redirect error , code {}", response.getStatusLine().getStatusCode());
            }
        } catch (IOException e) {
            e.printStackTrace();
        }finally {
            request.releaseConnection();
        }
        return null;
    }

    @Override
    public String homeRedirect(String url) {
        log.debug("PC跳转主页... {}",url);
        HttpGet request = new HttpGet(url);
        HttpResponse response = null;
        try {
            response = httpClient.execute(request);
            if (response.getStatusLine().getStatusCode() == HttpStatus.OK.value()) {
                String responseStr = EntityUtils.toString(response.getEntity(), "GBK");
                //log.debug("跳转主页返回：{}",responseStr);
                log.info("登录成功...");
                return responseStr;
            }else {
                log.error("login error , code {}", response.getStatusLine().getStatusCode());
            }
        } catch (IOException e) {
            e.printStackTrace();
        }finally {
            request.releaseConnection();
        }
        return null;
    }

    @Override
    public String wapLogin(String url) {
        log.debug("WAP登录...");
        url = "https://login.sina.com.cn/sso/login.php?client=ssologin.js(v1.4.19)";
        HttpPost post = new HttpPost(url);
        post.setHeader(HttpHeaders.USER_AGENT,UserAgents.STATIC_USER_AGENT);


        return null;
    }

    @Override
    public String webSearch(String keyword,int page) {
        log.info("微博搜索: {} 第 {} 页",keyword,page);
        try {
            keyword = URLEncoder.encode(keyword,"UTF-8");
        } catch (UnsupportedEncodingException e) {
            e.printStackTrace();
        }
        String url = "https://s.weibo.com/weibo/"+keyword+"?&b=1&page="+page;
        HttpGet request = new HttpGet(url);

        HttpResponse response = null;
        try {
            response = httpClient.execute(request);
            if (response.getStatusLine().getStatusCode() == HttpStatus.OK.value()) {
                String responseStr = EntityUtils.toString(response.getEntity(), "UTF-8");
                //log.debug("PC搜索返回：{}",responseStr);
                return responseStr;
            }else {
                log.error("login error , code {}", response.getStatusLine().getStatusCode());
            }
        } catch (IOException e) {
            e.printStackTrace();
        }finally {
            request.releaseConnection();
        }
        return null;
    }

    @Override
    public List<WeiboUser> getWeiboUsersFromSearch(String html) {
        List<WeiboUser> weiboUserList = new ArrayList<>();
        String regex = "feedBackUrlCallBack\\(([\\s\\S]*?)\\);";
        String reg = "\"pl_weibo_direct\"([\\s\\S]*?)\\)</script>";
        Pattern pattern = Pattern.compile(reg);
        Matcher matcher = pattern.matcher(html);
        while (matcher.find()){
            log.info("搜索返回结果正常");
            String plWeiboDirect = matcher.group();
            int start = plWeiboDirect.indexOf("\"html\":\"");
            int end = plWeiboDirect.indexOf("\"})</script>");
            String coreHtml = plWeiboDirect.substring(start+8,end).replace("\\n","")
                    .replace("\\t","").replaceAll("&quot;","\"");
            coreHtml = coreHtml.replace("\\\"","\"");
            //coreHtml = StringEscapeUtils.unescapeHtml4(coreHtml);

            Document doc = Jsoup.parse(unicodeToString(coreHtml).replace("\\",""));
            //实时微博
            Elements elements = doc.body().select(".feed_lists.W_texta");
            Elements namec = doc.body().select(".name.clearfix");
            if(elements.size()>0){
                Elements cards = elements.get(0).select(".feed_list.feed_list_new.W_linecolor");
                cards.forEach(p->{
                    Elements wTextb = p.select("div.W_textb").select("a");
                    if(wTextb.size()<2){
                        return;
                    }

                    String userCard = p.select(".name_txt.W_fb").attr("usercard");
                    String uid = userCard.substring(userCard.indexOf("id=")+3,userCard.indexOf("&usercardkey"));
                    if(bloomFilter.mightContain(uid)){
                        return;
                    }
                    WeiboUser user = new WeiboUser();
                    String avatar = "https://"+p.select(".W_face_radius").attr("src").replace("//","");
                    String username = p.select(".name_txt.W_fb").attr("nick-name");
                    String originText = p.select(".comment_txt").html();
                    String simpleText = p.select(".comment_txt").text();

                    String timeStr = p.select("div.W_textb").select("a").attr("date");
                    String source = p.select("div.W_textb").select("a").get(1).text();
                    SimpleDateFormat format =  new SimpleDateFormat("yyyy-MM-dd HH:mm:ss");
                    Long time= Long.parseLong(timeStr);
                    String d = format.format(time);
                    try {
                        Date date=format.parse(d);
                        user.setCrtTime(date);
                    } catch (ParseException e) {
                        e.printStackTrace();
                    }
                    user.setUid(uid);
                    user.setNickName(username);
                    user.setAvatar(avatar);
                    user.setSimpleText(simpleText);
                    user.setOriginText(originText);
                    user.setSource(source);
                    //获取详细信息 简介 性别 粉丝 关注 位置
                    weiboUserList.add(getMoreUserInfo(user,userCard));
                    bloomFilter.put(uid);
                });
            }
        }
        return weiboUserList;
    }

    @Override
    public WeiboUser getMoreUserInfo(WeiboUser user, String userCardUrl) {
        String url ="https://weibo.com/aj/user/newcard?"+userCardUrl+"_&type=1&callback=STK_15275595732867";
        HttpGet request = new HttpGet(url);
        HttpResponse response = null;
        try {
            response = httpClient.execute(request);
            if (response.getStatusLine().getStatusCode() == HttpStatus.OK.value()) {
                String responseStr = EntityUtils.toString(response.getEntity(), "GBK");
                //log.debug("获取详细信息返回：{}",responseStr);
                String reg = "\\{\"code\":([\\s\\S]*?)}";
                Pattern pattern = Pattern.compile(reg);
                Matcher matcher = pattern.matcher(responseStr);
                while (matcher.find()){
                    String resJson = matcher.group();
                    JsonObject jsonObject = new Gson().fromJson(resJson,JsonObject.class);
                    String html = jsonObject.get("data").getAsString();
                    String clearHtml = unicodeToString(html).replace("\\","");
                    Document doc = Jsoup.parse(clearHtml);
                    String gender = doc.body().select("em").attr("title");
                    Elements lis = doc.body().select(".userdata").select("li");
                    user.setGender(genderFormat(gender));
                    user.setFollowCount(Integer.parseInt(lis.get(0).text().replace("关注","")));
                    user.setFollowersCount(Integer.parseInt(lis.get(2).text().replace("粉丝","").replace("万","0000")));
                    user.setDescription(doc.body().select(".info").text());
                    if(doc.body().select(".userdata").size()>1){
                        String position = doc.body().select(".userdata").get(1).select("li").get(0).text();
                        user.setPosition(position);
                    }
                }
            }else {
                log.error("login error , code {}", response.getStatusLine().getStatusCode());
            }
        } catch (IOException e) {
            e.printStackTrace();
        }finally {
            request.releaseConnection();
        }
        return user;
    }

    private void getPinCode(String pcid){
        StringBuilder str=new StringBuilder();
        Random random=new Random();
        for(int i=0;i<8;i++){
            str.append(random.nextInt(10));
        }
        int num=Integer.parseInt(str.toString());
        String url = "http://login.sina.com.cn/cgi/pin.php?p="+pcid+"&r="+ str + "&s=0";
        HttpGet request = new HttpGet(url);
        HttpResponse response = null;
        try {
            response = httpClient.execute(request);
            if (response.getStatusLine().getStatusCode() == HttpStatus.OK.value()) {
                HttpEntity entity = response.getEntity();
                byte[] data = EntityUtils.toByteArray(entity);
                FileOutputStream fos = new FileOutputStream(pinCodePath);
                fos.write(data);
                fos.close();
            }
        } catch (IOException e) {
            e.printStackTrace();
        }

    }

    private String getTimestamp(){
        return Calendar.getInstance().getTimeInMillis()+"";
    }

    private String genderFormat(String gender){
        if("女".equals(gender)){
            return "f";
        }
        else return "m";
    }

    private String unicodeToString(String str) {

        Pattern pattern = Pattern.compile("(\\\\u(\\p{XDigit}{4}))");
        Matcher matcher = pattern.matcher(str);
        char ch;
        while (matcher.find()) {
            ch = (char) Integer.parseInt(matcher.group(2), 16);
            str = str.replace(matcher.group(1), ch+"" );
        }
        return str;
    }

}
